home *** CD-ROM | disk | FTP | other *** search
/ Swimsuit Review 95 / Swimsuit Review 95.iso / mac / Data / swim8.DIR / 00037_Script_37 < prev    next >
Text File  |  1995-07-13  |  618b  |  28 lines
  1. -- Browser Female
  2.  
  3. on mouseDown 
  4.   global MC
  5.   put mouseCast() into MC  
  6.   repeat while stillDown() = 1    
  7.     if mouseCast() = MC then      
  8.       set the castNum of sprite 9 to MC +1      
  9.       updateStage 
  10.       next repeat    
  11.     end if    
  12.     if (mouseCast() <> MC + 1) then set the castNum of sprite 9 to MC    
  13.     updateStage 
  14.   end repeat 
  15. end
  16.  
  17. on mouseUp
  18.   global MC
  19.   set the castNum of sprite 9 to 43  
  20.   updateStage
  21.   if the mouseCast = 43 or the mouseCast = 44 then   
  22.     sound stop 1
  23.     sound playFile 1, "Click.AIF" 
  24.     go to frame "Browser Female"
  25.   end if 
  26. end 
  27.  
  28. end